package cn.xorange.commons.core.annotation.aspect;

import cn.hutool.core.convert.Convert;
import cn.xorange.commons.core.annotation.DataScope;
import cn.xorange.commons.data.constants.DataConstants;
import cn.xorange.commons.data.core.entity.BaseEntity;
import cn.xorange.commons.security.context.SecurityContextHolder;
import cn.xorange.commons.security.entity.SecurityRole;
import cn.xorange.commons.security.entity.SecurityUser;
import cn.xorange.commons.security.utils.SecurityUtils;
import cn.xorange.commons.utils.Collect.CollectUtils;
import cn.xorange.commons.utils.lang.StringUtils;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;

import java.util.ArrayList;
import java.util.List;
import java.util.Objects;

/**
 * @author : yangjian
 * date : 2025/1/13
 * description :
 */
@Aspect
@Component
public class DataScopeAspect {

    /**
     * 数据权限过滤关键字
     */
    public static final String DATA_SCOPE = "dataScope";


    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) {
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope) {
        // 获取当前的用户
        SecurityUser user = SecurityUtils.getUser();
        if (Objects.nonNull(user) ) {
            boolean isAdmin = SecurityUtils.userIsAdmin();
            // 如果是超级管理员，则不过滤数据
            if(!isAdmin){
                String permission = org.apache.commons.lang3.StringUtils.defaultIfEmpty(controllerDataScope.permission(), SecurityContextHolder.getContext());
                dataScopeFilter(joinPoint, user, controllerDataScope.orgAlias(),
                        controllerDataScope.userAlias(), permission);
            }
        }
    }


    /**
     * 数据范围过滤
     *
     * @param joinPoint 切点
     * @param user 用户
     * @param deptAlias 部门别名
     * @param userAlias 用户别名
     * @param permission 权限字符
     */
    public static void dataScopeFilter(JoinPoint joinPoint, SecurityUser user, String deptAlias, String userAlias, String permission) {
        StringBuilder sqlString = new StringBuilder();
        List<String> conditions = new ArrayList<String>();
        List<String> scopeCustomIds = new ArrayList<String>();

        String[] permissionArr = StringUtils.toArray(permission,",");

        user.getRoles().forEach(role -> {
            if (DataConstants.DATA_SCOPE_CUSTOM.equals(role.getDataScope()) && CollectUtils.containsAny(role.getPermissions(), Convert.toStrArray(permission)))
            {
                scopeCustomIds.add(Convert.toStr(role.getRoleId()));
            }
        });

        for (SecurityRole role : user.getRoles())
        {
            String dataScope = role.getDataScope();
            if (conditions.contains(dataScope))
            {
                continue;
            }
            if (!CollectUtils.containsAny(role.getPermissions(), permissionArr))
            {
                continue;
            }
            if (DataConstants.DATA_SCOPE_ALL.equals(dataScope))
            {
                sqlString = new StringBuilder();
                conditions.add(dataScope);
                break;
            }
            else if (DataConstants.DATA_SCOPE_CUSTOM.equals(dataScope))
            {
                if (scopeCustomIds.size() > 1)
                {
                    // 多个自定数据权限使用in查询，避免多次拼接。
                    sqlString.append(StringUtils.format(" OR {}.org_id IN ( SELECT org_id FROM sys_role_org WHERE role_id in ({}) ) ", deptAlias, String.join(",", scopeCustomIds)));
                }
                else
                {
                    sqlString.append(StringUtils.format(" OR {}.org_id IN ( SELECT org_id FROM sys_role_org WHERE role_id = {} ) ", deptAlias, role.getRoleId()));
                }
            }
            else if (DataConstants.DATA_SCOPE_OUR_ORG.equals(dataScope))
            {
                sqlString.append(StringUtils.format(" or {}.org_id = {} ", deptAlias, user.getOrgId() ));
            }
            else if (DataConstants.DATA_SCOPE_OUR_ORG_LINK.equals(dataScope))
            {
                sqlString.append(StringUtils.format(" or {}.org_id in ( SELECT org_id FROM sys_org WHERE org_id = {} or find_in_set( {} , ancestors ) )", deptAlias, user.getOrgId(), user.getOrgId()));
            }
            else if (DataConstants.DATA_SCOPE_MYSELF.equals(dataScope))
            {
                if (!StringUtils.isEmpty(userAlias))
                {
                    sqlString.append(StringUtils.format(" or {}.user_id = {} ", userAlias, user.getUserId()));
                }
                else
                {
                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
                    sqlString.append(StringUtils.format(" or {}.org_id = 0 ", deptAlias));
                }
            }
            conditions.add(dataScope);
        }

        // 角色都不包含传递过来的权限字符，这个时候sqlString也会为空，所以要限制一下,不查询任何数据
        if (conditions.isEmpty())
        {
            sqlString.append(StringUtils.format(" or {}.org_id = 0 ", deptAlias));
        }

        if (!StringUtils.isEmpty(sqlString.toString()))
        {
            Object params = joinPoint.getArgs()[0];
            if (Objects.nonNull(params) && params instanceof BaseEntity)
            {
                BaseEntity baseEntity = (BaseEntity) params;
                baseEntity.setParams(DATA_SCOPE, " and (" + sqlString.substring(4) + ")");
            }
        }
    }



    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint) {
        Object params = joinPoint.getArgs()[0];
        if(Objects.nonNull(params) && params instanceof BaseEntity){
            BaseEntity baseEntity = (BaseEntity) params;
            baseEntity.setParams(DATA_SCOPE, "");
        }
    }
}
